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The SORT program accepts SURT tanguage input containing file 
statements,» a SORT statement» and user option statementts). It 


generates the communicate required to execute the SGRT function 
of the Master Control Frogram (MCP). The SORT program causes a 
cesigqnated file to be sorted» using tape or disk» ona series of 
specified keys in ascending or descending order» as required. 


The sort tanguage specifications are read frem a file labelled 
CARDS or from the SPO depending on Program Switch 0. If SWO=1> 
input will be read from the SPO CACCEPT). The length of the 
input record scanned for statements is 160 tytes for SPO or MCP 
default for the file CARDS. This may be altered by modifying the 
file CARGS for record size and no defauit. 


The workfile medium deoends on the resources available and/or the 
medium reauested by the user. There are no default I/0 media for 
this program. INPLACE SORT or TAPESORT should be specified» for 


examples» when minimat disk resources are available for sorting. 
Note that the scratch workfile for a JISKSORT (vector sort) will 
De approximatety 2 1/3 times the size of the input file. In 


contrast,» the scratch workfile for an INPLACE SORT is the same 
size as the input file. 


SORT statements are in free-fieid format and are made up of 
words» reserved words» numbers» symbols» and reserved symbdois. 


The statements may be permuted in any Legitimate order. SORT 
LANGUAGE input is defined» in ENF», as: 


es 
$3 


<SORT LANGUAGE INPUT> - <FILE STATEMENTS><SORT STATEMENT> 


<USER OPTION STATEMENT> 


Comments are altowed between statements and nat inside. The 


entire ainput record 1s scanned fer text. For those who wish to 
use sequence numbers in ccotumns 73 to 80 of their inputs syntax 


errors tay be prevented by either putting a colton €:) in column © 


72 or modifying the file CARDS to NOT GEFAULT and RECORD.SIZE =. | 


72. Input from data recorder devices must be delimited by thet 2° 


colon (2)» as the recorc size cannot be modified. 


BURROUGHS CORPORATION | COMPANY CONFIDENTIAL 
COMPUTER SYSTEMS GROUP £B1800/61700 SORT LANGUAGE. 


SANTA BARBARA PLANT P.S. 2201 6752 REV. J 


RELATED DOCUMENTATION 


NAME NUMBER 
BL@OC/i700 TAPE SORT PeSe 2212 5181 
81800/170G DISK SQRT P.3. 2212 5264 
Bisoc/i700 INPLACE SORT P.Se. 221e 5538 
BisOt/1i7CC MERGE P.Se 2212 5207 
B1800/1700 SOL C8NF Version) P.S. 2212 5405 
B1i800/170C0 Software Operational Guide #10687 31 
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SYNTAX 


<FiILE STATEMENT> i= 


<MULTIPLE INPUT FILE 
DESCRIPTICNS> i= 
<INPUT FILE 
DESCRIPTIGN> i: 


<FILE-NAME> se 
K<FILE«iD> st 


<MULTI-FILE~ID> s2= 
<PACK-ID> 
<LASEL> 3t= 


<INPUT FILE 
PARAPRETERS> i235 


<INPUT MEDIA> i3= 
<RECORDS — 
PER AREA> 35 


<NUMBER OF AREAS> i235. 


Ce ae ee! 
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FILE <INPUT FILE CESCRIPTION> 
<OUTPUT FILE DESCRIPTION> 
FILE <MULTIPLE INPUT FILE DESCRIPTIONS> 


<1 TG 8 <INPUT FILE DESCRIPTION>> 


IN <FILE-NAME><INPUT FILE PARAMETERS> 
IN <FILE=-NAME><DIS# IN DEFAULT OPTION> 
<MULTI-FILE-ID> 
<MULTI-FILE-1D>/<FILE-ID> 
<PACK~1D>/<MULTIFILE-1B>/ 
<PACK=-ID>/<MULTI-FILE-ID>/<FILE-1D> 
<EMPTY> | | 
<LABEL> 

<LABEL> 

<LABEL> 


CALPHANUMERIC CHARACTER STRING> 
WCALL CHARACTERS EXCEPT QUOTED" 


C<INPUT MEDTA><RECORD SIZE> 


<RECCROS PER BLOCK> <INPUT OPTION LIST>) 


CARD 4 CAROS 1 PAPER 4 TAPE a, 
DISK C<RECORDS PER AREA> C<NUMBER OF AREAS> IT) — 
<UNSTIGNED INTEGER? 


<UNSIGNED INTEGER> 


ERE ie CRRA AMPA 
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<RECORD SIZE> 23 


<RECGRDS 
PER dLOCK> s= 


<INPUT CPTION 
Lt St> 2:5 


<INPUT OGPTIQN> i::= 


<PURGE CPTIOQN> ; 


e¢ 


<VARTABLE OPTIGN> i: 


<MAX BLOCK SIZVE> :2= 
<MULTI CPRPTION> 322 
<OPTICNAL OPTION>::= 


«DIS (IN 
DEFAULT OPTIOQN> s::= 


<OUTPUT FILE 
DESCRIPTION> i:= 


<OUTPUT FILE 
PARANETERS> 33= 


<ODUTPUT MEDI A> i= 


<PARITY PART> 3:= 


—<QUTPUT OPTION 
LIST> is 


e=2 
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<UNSIGNED INTEGER> 

<UNSIGNED INTEGER> 1 <EMPTY> 

<INPUT OPTION> 3 
<INPUT OPTIOQNS> <INPUT OPTION LIST> 
<PURGE OPTION> 

<V¥ARIABLE OPTIOGN> 

<MULTI OPTION> 

<OPTICNAL OPTIGN> 

PURGE 1 <EMPTY> 


VARTABLE 1 VC<MAX BLOCK SIZE>) 
<EMPTY> 


<UNSIGNED INTEGER> 
MULTI | <EMPTY> 


GPTIGNAL 1 <EMPTY> 
CDISK <PURGE OPTICN> DEFAULT) 


OUT <FILE-NAME> <CUTPUT FILE PARAMETERS> 
OUT <fFLiILE“NAME> <DISk OUT DEFAULT OPTION> 


C<QGUTPUT MEDIA> <RECORD SIZE> 
<RECTRDOS PER BLOCK> <QUTPUT OPTION LiIST>) 


CARD 1 CARDS 1 PAPER | 
TAPE <PARITY PART> | 
DISK (<RECORDS PER AREA> {<NUMBER OF AREAS>1) 
PRINTER 


CE) 7 CEVEN) | €0) 1 (ODD) 
<EMPTY> | 


<OUTPUT OPTIGN> 
<QUTPUT OPTION><OUTPUT OPTION LIST> 


a 
Pet 
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<QUTPUT OPTION> ::- <VARIABLE GPTION> 

| i <MULTI CPTION> 
<DISK CUT | 
DEFAULT GPTION> 3::- (DISK DEFAULT) 
SEMANTICS 


<FILE STATEMENT> contains information concerning the input and 
output files and records within the files. 


<MULTIPLE INPUT FILE DESCRIFTIONS> specify that a merge or a 
multiple file disk sort is to be performed. Two to eight files 
may be merged and one to eight files may be sorted. The <DISK 
OUT OEFAULT OGPTION> may not be used with merges. 


If mcre than one file is inout to the sorte» the fiite numbers of 
the files to de sorted are put into the file table in a top down 
manner. The first eight bits of the table are set to zero. for 
table format. The base relative address of the file table is 
stored in C1T.2. | 


<INPUT FILE DESC RIPTION> consists of the word “IN" followed by 
<INPUT FILE FPARAMETERS> or <DISK IN DEFAULT OPTIOGON> for the input 
« 


file. QUTFUT FILE DESCRIPTICN> consists of the word “QUT" 
followed by the <QUTPUT FILE FPARAMETERS> or <DISK OUT DEFAULT 
GPTIGN> for the output file. 


<INPUT FILE PARAMETERS> and <OUTPUT FILE PARAMETERS> contain the 
descriptive information required for sorting an input file and 
producing an output file. The <DISK IN DEFAULT OPTION> may be 
used when the input file 1s on disk. The descriptive information 


for the input file will be obtained from its disk file header» 


eliminating the need for parameter specifications. fhe <DISK OUT 
DEFAULT OPTICN> may be used when the input file is on disk. The 
output file witl then receive the same attributes as the input 
fite CRECORD Size,» BLOCKING FACTOR, AREAS» etc.}. The carameters 
foilowing the <FILE NAME> are enetOsee Within parentheses and are. 


separated Dy a space. 


<FILE- NAME> may consist of packrid» multi-file-id» and fiterid 
combined in accordance with standard 81800/B1790 file naming © 
conventions. OO | 


oe 
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<INPUT MEDIA> and <OQUTPUT MEDIA> specify the hardware names for 


the input file and output file respectively. If the hardware 


type is DISK or PACK, the <RECOQRDS PER AREA> must be specified. 
If the hardware type is TAPE» the type of sutput tape may be 
opticnaliy specified. 


C<RECORDS PER AREA>) ts an unsigned integer enclosed 
parentheses specifying the number o: records contained in a di. 


or pack area. 


wow 
~ 


<RECCRO SIZE> specifies the number of character positions the 
record wiit occupy in memory. If the record size is variable» 
<RECORD SIZE> is coded as the maximum number of positions which 
will be occupied by the largest record in the file. The maximum 
record Length permitted 18 65,535 bits. If the output record 
size and the input record size differs» the input record will be 
appropriately right truncated cr right biank- filled to the output 
record size when moving it to output. 


For blocked files having fixed tength records» <RECORDS PER 


BLOCK> 15 an unsigned integer which specifies the number of 


fogical records within a singte block. <RECORDS PER BLOCK> is 
omitted for unblocked files. 


The <PUKGE OPTICN> permits the user to opticnatty purge the input 
file after sorting by coding the reserved word “PURGE”, If this 


entry is omitted» the input file is closed with release. 


The <PARITY PART> option permits the user to specify the type of 
tape to receive the outout file. if even or odd parity is 
specified» /f-track tape is assumed.» If <PARITY PART> is omitted> 
9=tracks odd parity» either NRZ or PE tape is assumed. Tape 
density is not selectable. | 


The <VARIABLE OPTICN> is used te specify that the input or output. 


file consists of variable-length records. The VC<MAX SLOCK 
SIZE>) part is used for blocked variable-length recerds. 


The <MULTI OPTION> is used with "PACK" or "CISK™ to ailow files 


to extend over more than one pack or cartridge. 
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The <OPTICNAL OPTICN> atltows the user to specify any input fiie 
as optional. I# optional is specified and the fite is not 
present» the user will be advised by a rormal no file message 
from the MCP. The missing file can be loaded cor an "“OF™ message 


entered to cause the file to Se bypassed. The defauit option may 
not be used with "CPTIGNAL.™ 
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SYNTAX 

<SORT STATEMENT> iss <FIELE CESCRIPTION PART><BIAS PART> 
<NUMEER OF RECORDS PART> 

<FIELD DESCRIPTION 

PART> s3= <FIELD PART><DESCRIPTION PART> 

<FIELD PART> i= FIELD & FIELDS § KEY I KEYS 


<DESCRIPTION PART> st=  <DESCRIPTION PART><DESCRIPTIUN> 
1 <DESCRIPTION> 
<DESCRIPTION> i= C<RELATIVE LOCATICN PART><FIELD 
LENGTH PART><SEQUENTE PART> 
<FORMAT PART>) 


<RELATIVE LOCATION 


PART> it= <UNSIGNED INTEGER> 
<FIELD LENGTH | 
Rie ae *eiehre <UNSIGNED INTEGER> 


<SEQUENCE PART> sic ASCENDING 1 A 1 DESCENDING 
iD | EMPTY 


<FORMAT PART> si ALPHA 1 UA | NUMERIC 1% UN 
| { SA 1 SN | NC $ RSA | RSN 1 KEWMPTY> 


<BIAS PART> i:= BIAS <UNSSGNED INTEGER DO - 99> 
<PERCENT PART> 1 EMPTY 


<PERCENT PART> ti <PERCENT SIGKh> 1 <EMPTY> 


<NUMEBER OF RECORDS 
PART> si= <UNSIGNED INTEGER> RECORDS 
i EMPTY | 
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The <SOQRT STATEMENT> contains control information which defines 
the sort key,» fields within the key» and the secquence into which 
each field of the key 15 to be sorted. The description for each 
field is bounded by parentheses. The reserved word defined dy 
the <FIELD PART> is coded once and applies to atl multiple field 
descriptions. | Fieids to be sorted can be alphanumeric» sidqned 
alphanumerics or unsigned four-bit numeric. All four formats are 
permitted in the same record in any order. Each individual field 


may be sorted to either ascending or descending sequence.  £ The 
maximua number of sort keys 18 39 unsigned keys» or 15 signed 
keys» cr a combination of unsigned and signed keys. Here each 


Signed key counts 45 two keys» the total not to exceed thirty. 


‘<DESCRIPTION> 


<DESCRIPTIOQN> gives the location» Length» sequences and format of 
each field te be sorted. The Location of the fielc is specified 
by an unsigned integer which indicates the character» digit» or 
sign position of the most significant character or digit of the 


fietd relative to the first character or digit in the record. 


The first character or digit of the record 1s considered to de 
location one. The length of the field is specified by an 
unsicned integer which indicates the number of character» or 
digits» positions contained within the field. The maximum size of 
the total key is 4,095 bits. The sequence to which the field is 
to be sorted is specified by the reserved words ASCENDING Cor A) 
for ascending sequence and DESCENDING Cor 0D) for descending 
sequence « If sequence 18 omitted» ascending 15 assumed. The 
format cf the data in the field to be sorted may be specified by 
reserved words ALPHA Cor UA) fcr unsigned alphanumeric» NUMERIC 
Cor UN) for unsigned numerics SA for signed alphanumeric 
(produces two keys)» SN for signed numeric (produces two keys)>, 
RSA for right signed altha Cpreduces four keys)» RSN for right 
Signed numeric (Cproduces twe keys)» or NC fer unsigned alpha 


Without collation. The sign for a RSA field is in the zone, ve 


portion of the right most Dyte. The sign for a RSN field is in 


the right most digit. if format is ommitted» aipha is assumed. 
The units of dength and displacement are 8-bits for alpha or | 
4-dits for numeric. The elements of <DESCRiIPTION> are separated 


by spaces. 


535 
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<BIAS PART> 


Te) Ce 


The information given by the <B8IAS PART> is usec to optimize the 
sort program. The value of the 8I1A5» in some cases,» can Se 
accurately estimated. If givens it is assumed to have been 
computed as follows: 


HIAS = 1LO0K/CN-1)> rounded to the nearest integer. 


Here N is the estimatec number cf records in the file» and K is 
the estimated count of the occurrences of the relation: 


SQRT KEY (1)th RECORD < OR = SORT KEY OF CL#tidst RECORD. 


Note that | 


BIAS equals 100 for an already sorted file. If 
omitted» <BiAS PART> is assumed to be 50 percent» that 15>» 
completely randca. | - 


aE ae EE -e ee MS OE ae a 


The number of records is an estimate of the number of records in 
the file to be sorted. It is used in conjunction with the <BIAS 
PART> for optimization purposes. If omitteds <NUMBER OF RECORDS> 
is assumed to be 2020900. If the input is a disk file» the number 
of records is supplied by the disk file header. 
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SYNTAX 


Wn SR Ma we en 


<USER OPTION STATEMENTS 


<USER OPTION> ::= 
<MEMORY SIZE OPTION> ::= 
<SORT TYPE OPTION> it= 


<SYNTAX OPTIGN>D ; 


€SEQUENCE CPTION> 335 


<DISPLAY TIMING GPTIGN>:s= 


<7IP CPTICN> ::= 
<ZiP STATENENT> 


<RESTART CPTIOQN> 
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<USER OPTION> 1 <USER OPTION> 
<USER OPTIGN STATEMENT> 


<MEMORY SIZE OPTION> § <SORT TYPE 
OPTION> 1 <S¥NTAX OPTION> 
<SEQUENCE OPTION> 
<DISPLAY TIMING GPTION> 1 
<RESTART OPTION> 
<NOPRINT OPTIQN> & <COMMENT> 

<PARITY ACTION> 1 <PARTITION OPTION> 
<CUPLICATE CHECKING OPTION> 

<TAGSORT OPTICN> 2 <TAGSEARCH OPTION> 
<TAGINDEX OPTION> 

<INCLUDE-DELETE OPTIUN> 

<WORKPACKIO OPTION> | <STABLE OPTIGN> 


<ZIP OPTION> 
<COLLATE OPTION> 


MEMORY <UNSIGNED INTEGER> 


<EMPTY> 

DISKSORT 1 INPLACE | <NUMBER OF TAPES> 
TAPESORT #1 MERGE 1 <EMPTY> 

SYNTAX 1 <EMPTY> 

SEQUENCE 1 <EMPTY> 

TIMING 1 <EMPTY> 


‘ZIP (<ZIP STATEMENT?) 


<EMPTY> 


<ANY MCP CONTROL STATEMENT 
OR CHARACTER> 


RESTART <JOB NUMBER 


<EMPTY> 
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<JO0B NUMBER> ss= 
<COLLATE OPTIOQN> ::=-= 


<FILE-NAME> si 


<CULLATE.TABLES.SPECS> si 


<SAVE.PART> s:= 


<LITERAL .LIST> 2:2: 


<LITERAL.~PART> i: 
CHEX.PART> 23= 


<HEX.DIGITS> is= 


<RANGE.PART> 28= 
<CHARACTER.PART> i: 
<CHAR,.LIT> ::= 
<NOPRINT OPTION> :3= 


<COMMENT> 322 


<PARTTY acCTICQN> i: 


<PARTITIUN QPTICQN> 23= 


<STARTING RECORD> i: 
<NUMBER OF RECORDS> ::= 


<DUPLICATE CHECKING 
COPTIUN> 33s 
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<UNSIGNED INTEGER> 


COLLATE (<FILE- "NAME> <COLLATE. TABLE. 
SPECS>) 


<ANY VALID FILE NAME (Quotes are 
required if ODlanks» quotes» slashes» 
left or right parentheses are used 
in a name>) 


C<LITERAL.LIST><SAVE.PART>) 
<EMPTY> 


SAVE 1 <EMPTY> 


<LITERAL.PART><LITERAL.LIST> 
<LITERAL .PART> 


<HEX.PART> 1 <CHARACTER.PART> 
@<HEX.DIGITS><RANGE.PART> <HEX.DIGITS>a 


<ANY STRING OF PAIRS OF ‘HEX ADECIMAL 
CHARACTERS> 


~ | <EMPTY> 

"<CHAR.LIT>" 

<ANY CHARACTERS EXCEPT QUDTE> 
NOPRINT | <EMPTY> 


<ANY NON-RESERVED WORD OR NON-RESERVED 
CHARACTER> 1 EMPTY 


PARITY DISCARD t <EMPTY> 


PARTITION C<STARTING RECORD> 
<NUMSER OF RECORDS>) 1 <EMPTY> 


<UNSIGNEC INTEGER GTR o> 
<UNSIG NEO INTEGER GTR o> 


CUPCHECK | DUPCHECK <IN-GR-OUT> 
<CUP-FUNCTION> <DUP-TYPE> | <EMPTY> 


BURROUGHS CORPORATION 
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SANTA BARBARA PLANT 
<INwOR-GUT> ssa 
<DUP-TYPE> 332= 


<DUP-FUNCTIOQN> 232 


<TAGSORT CPTIOND> is 
<TAGSEARCH QPTION> 235 
<TAGINDEX OPTIODN> ss= 


<INCLUDE-DELETE OPTIGN>=:s= 


<IN“PART> 2 


<KEY.DESC.LIST> 


ee 
ae 
i 


<KEY.DEST> 22= 


<ITEM i> $s: 


<COMPARE TYPE> fi 
<ITEM 2> 332 


CLENGTH>? ::= 
<TYPE> ii= 
<LOGIC PART> t:= 


<WORKPACKIO OPTION> s:= 
<NAME> 222 


<STABLE OPTION> sts 
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iN 1 QUT 
ALL 1 FIRST i LAST 


LIST 1 COPY C<FILE-NAME>) 
DUMP C<FILE“NAME>) § REMOVE 


TAGSORT { <EMPTY> 

TAGSEARTCH { <EMPTY> 

TAGRPG 1 TAGCOBOL 1 <EMPTY> 
INCLUDE <IN=-PART> 

<KEY.DESC.LIST> § DELETE «<IN=-PART> 
<KEY.DESC.LIST> 1 <EMPTY> 

IN 4 <EMPTY> 

<KEY.ODEST> <LGGIC PART> 

<KEY.DESC> <LCGIC PART> 
<KEY.DESC.LIST> 


C<iTEM 1> <COMPARE TYPE> <ITEM 2> 
<LENGTH> <TYPE>) 


<INTEGER 1-8192 BYTES OR 1-16384 DIGITS> 


ESL ! NEG 1 L855 7 GTR | LEQ 1 GEO 
<EMPTY> 


"<1-3 CHARACTERS>” 1 g@<i-6 HEX DIGITS5>a 
<INTEGER 1°8192 BYTES DR 1°16384 DIGITS> 


<INTEGER 1-3> 1 <EMPTY> 
ALPHA 1 UA | NUMERIC 1 UN 1 <EMPTY> 


OR } AND @ <EMPTY CLAST MUST BE EMPTY)> 


WORKPACK1 <NAME> 4 WORKPACK2 <NAME> 
<EMPTY> | 


<1-10 CHARACTER DISK PACK OR 
CARTRIDGE NAME> 


STABLE | <EMPTY> 


an 4 


BURRDUGHS CORPORATION COMPANY CONFIDENTIAL 
COMPUTER SYSTEMS GROUP | B1800/81700 SORT LANGUAGE 
SANTA BARBARA PLANT Pesde 2201 BY52 REV. J 


Mn 1 Da en A et a 


Coding to exercise user option is via the <USER OPTION 
STATEMENT>. A space separates adjacent elements within the user 
options. 


The amcunt of memory to be used by the SORT progranr is specified 
by the <MEMCORY SIZE OPTIGN> and must be a minimum of 8-000 bytes. 
The option is coded ty the reserved word MEMORY followed by an 
unsigned integer indicating the memory size in bytes. If <MEMORY 
SIZE OPTIOQN> is omitted» 20,000 bytes is assumed. 


Note: Maximum memory for an INPLACE SORT is 18-500 bytes. 


Additional memory for all sorts will be dynamically assigned if? 
A. Availatle from roltwtout of the calling program. 
B. Memory specified is insufficient for sorting.. 


Additional memcry> up to 40K Obdytes» wilt be atlocated in 
increments of 1K bytes. 


LS oun ee een 
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S5QURT TYPE OQPTION> 


<SORT TYPE GPTICN> is used to snecify of fo sort types 
CWECTOR RECORD SORT, INPLACE RECORD SURT> TAPESORT, or WERGE 
ONLY). If <SGRT TYPE . OPTIOQN> 13 omitted or “"DISKSORT"™ is 


entered» a VECTOR RECORD SRT 18 executed. INPLACE SORT 
C"INPLACE™" entered) allows the user to execute a sort with a 
minimum of resources» and sort 18 executed without using 


additional disk space. <NUMBER OF TAPES> tapesort will cause a 
vector sort using tape for work files to be executed. <NUMBER QF 


TAPES> can be an integer from three to eight. If <SORT TYPE 
DPTICN> is omitted and multiple input files are specified» a 
merge only is assumed. The keyword "MERGE" can also be used to 


specify a merge only. 


SSYNTAX GPTIGN> 


The final output desired is specified by the <S5YNTAX OPTION>. if 
the <SYNTAX OGPTION> is coded with the reserved word» SYNTAX» the 
input will be checked for syntactical errors» Gut the sort will 
not be executed. If <3YNTAX GPTION> is omitted» the sort 
intrinsic 1s executed. | 


ail be sequence checked» and the NUMBER DF 
Ll be printed on the SPQ. 


This. option causes qenerates sort parameters as a timing estimate 
of sort. time to be printed. 


‘canny, ceaaian wane. stain pene ee See— a 


Allows the user to specify an operation to be performed by the © 
MCP at the completion of 4 successful sort. ao 
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SRESTART QPTLION> 


The <RESTART OPTION> is used to restart an incompleted TAPESORT 
corresponding to the job number suponlied in the <RESTART OPTION 
STATEMENT>. | 7 


SCOLLATE OPTION> 


SORT witli create a virtual collating sequence file from its own 
specifications. The file wilt be createds tocked on disk» used 
by the sorting programs and Left on disk after the sort if SAVE 
1s specified. The file witli also be saved if compiling. 


NOTE: If <COLLATE.TABLE.SPECS> part is <EMPTY>, the file 
specified by <FILE-NAME> will be accessed. The file specified 
must have been previously generatec by sort by use of the 
<COLLAT&C OPTION> and <SAWVE PART>. Use cf files generated by 
other programs (Ci.e. CREATE/TASLE) can cause erroneous sort 
sequences or error conditions. | 


The tabte is created fram the specified titerais with the first 
item specified collating a5 hex 0. Any items not specified wiil 
collate as themselves. No item may be specifiec twice. Example: 


COLLATECCOLLATE /10"9376543210"7)) 


A collate file named COLLATE/1 witt be created» used for the 


sort» and removed Cuntess an abnormal terminate cccurs). The 
collating sequence wilt be "9876543210" <a0A-COQ *ABCDEFGHI" 
@CA-0DlI “JELMNCPQR™ d@DAsEiad “STUVWXYZ" GEA-EFa aFA-FFS". The 


output wilt not contatn characters of value d00-099 as they were 
overlaid and not moved. 


ee ME acer SIE gaa 24 


Must be the first specification> if used. Nothing will be 
printed unless syntax errors are founc. sequence information 
wiil be printed on the SPQ. 
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<COMMENT> 


Comments may be interspersed among statements and options for 


documentation purposes. A colcn» not in a ZIPs FILE“NAME> or 


quotes» terminates scanning of that card or record. Anything to 
the right of the colon wilt be jtgnored. ‘ae 


SPARITY ACTION> 


Allows the user to specify whether records with parity errors 
should be discarded or cause termination of the sort. Defauit is 
termination. This option applies to DISKSORT> TAPESORT> or 
MERGE. | | 


<PARTITICON OPTIOQN> 


‘AA A OE ER A RR A wee eee C1 is We a ae ee cee 


A specific portion of the input file may be sorted if this option 
is set. It anppties only to ¥SQRT or TAPESORT. 


When OUPCHECK is specified without Darameters the last pass of 


the sort program wilt check for duplicate keys. If an any are 


found a pointer file wili be created and the file names wilt be 


displayed on the SPQ. The peinter file would contain an eight 


byte record for each duplicate record. Each eight byte record 
would contain 2 four byte packed decimal relative pointers. The 


~farst wouid point to the duplicate record and the second woutid 


point to the record it duplicates. 


When other parameters are specified then a single pass wiil be 
made over the file by SCRT checking for duplicate keys. lf "iN" 
is specified then a SORT will not be performed. The records will 
be checked after the SORT when "OUT" 1s specified. 


The next parameter specifies whether the duplicate records are to | 
be listed» copied to a second file» moved to a second file» or 
removed and discarded. | 
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The last parameter determines the duplicate recerd grouping that 
will be used by SORT. Ail but the first is specified by "FIRST" 
and atl but the last is specified by "LAST". deleted. deleted. 
[If nothing else is specified then the duplicate records wiil be 
checked for by the sort program during the last sorting pass. In 
this case a fite af duplicate record pointers will be created. 
The file will be catted 5$0D.<JCB NUMBER> and wilt contain §& 
character records which are two 4& character pack decimal pointers 
to the durlicate records and to the records they are duplicates 
of» respectively. If the <IN-*OR-OUT> part is specified then the 
function wilt be thandied by SORT. The <IN-QR-OUT> part 
determines whether or not the input file is to be searched. 
Duplicate records may be Listed» copied into a second file» 
removed to a second files» or removed and discarded. Three groups 
of duplicate records may be considered» “FIRST; "LAST™ >» and 
"TALL". The “FIRST™ and "LAST™ group are all dupticates except 
the first and last respectively. For example, to “DUPCHECK IN 
LIST FIRST" and there were three records the same in the input» 
then the Last two would be printed. 


When memory and/or disk space are restricted» the use of these 


options may improve sorting tie. The specification of any one 
of them causes the sort to Duild workfile records consisting only 


of the keys to be sorted on» and a 24-bit relative record 
pointer. | | 


In most cases this 18 consideratly smatter than the input or 
output records and wiil» therefore» sort faster. The output file 
will be different for each of these options. 


TAGSORT witli produce a file of four byte» packed decimai relative 
record pointers § only. TAGSEARCH witt use the pointers to 
randomly read the tnput records (Cdisk only) and output them in 
sorted order. TAGRPG will produce a file of three byte» packed 
decimal fointers and the specified keys. TAGCOBOL will do the 
same except that the pointers witt be four bytes. TAGSORT >» 
TAGRPG, or TAGCOBOL may not output to cards or to the printer. 


A total of 1C keys will be allowed. fach key may compare up to | 
three characters. AND and OR togic witt be provided for © 
| continuing from one key to the next. Each key may compare a 
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field in the record to either a constant contained in the key or 
to another field in the record. The displacement values become 
O-8151 for byte and 0-16383 for digit when stored in the keys. 
The quotes delimit character Literals which may contain any three 
characters except the quote and question mark. The sians denote 
hex Literals and may contain only i"6 hex digits. Character 
literals are left justified with Dlank fill and truncation on the 
right. Hex Literals are right justified with zero fitt and 
truncation on the (left. All titerats are right justified in the 
KEY.DATA field. SORT will set up the key table from the above 
information. Tf IN is specified» then SORT will perform the 
functions, otherwise» the proper Sort Intrinsic will be catled. 
The reserved words» INCLUDE and DELETE,» way be used only once, 
but each may be followed by several keys. The Sop that compares 
these keys terminates on either a zero compare type or the length 
of the table. 


SWERKPACKIL OPTICN> 


Pack ID4*s5 may be specified so the DISK SORT'S workfiles can be 
separated on one or more disk drives. This speeds the sorting by 


cutting down read-write head contention. 


<STABLE GPTION> 


This option may be specified fer SORT/VSORT and SORT/TAPESORT. 
The use of this option causes duplicate records to retain their 


original order. Default is not stable. 
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FILE NAMES 


The current release of SORT ts consistent with the MCP"'s file 
naming conventions except that quotes are stiit required around 
names containing special SORT characters such as left 
fFarenthesis» right farenthesis» and quote. As restricted by the 
MCP» blanks» stashes and quotes cannot appear in filenames unless 
they are quoted. The special characters enumerated are used as 
delimiters for SORT or MCP statements» and are therefore 
prohibited tn filenames. . 


Users who run under the file security mechanism available in the 
current MCP should take special note of the parentheses required 


in the multifilerids of secure files. These wultifite-ids must 
De quoted» e@ege» PACKA/"CUSERI"/FILEs since both the Left and 
right parenthesis occur in the filename. if the quotes are not 


included» SORT produces an errcr message saying that it cannot 
focate an input or output file. 
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SORT COMMUNICATE 


CT.VERB = 29 
CT.OEJECT = Base relative address of SORT Information Table 
CT.ADVERE = SORT.RESTART BITC1) vIF POSSIBLE 
SORT .DUPCHECK BITC 1) ZCHECK FOR DUPS 
SORT.~W1.PID BITC1) 4PACK ID» GO = SYSTEM 
SORT.W2.PID BITt1) ZPACK ID, 0 = SYSTEM 
MUL_INPUT_FLAG BITC 1) Z0=CT.2 15 FPB NUMBER 
RESERVEL BiT(7) %1=CT.2 is ADDRESS 
CT. = Base relative address of SORT Key Table 
CT.2 = Jf MERGE or MULTIPLE FILE INPUT» then dase relative 
address of FILE TABLE, else input file number 
Cit<«s | = If QSORT.~SAME.NAME.WIN.CUT then input fite number, 
| else output file number 
CT.4 = Cottate fite number or not zero 
CT.5 = /ero 
CT.6 | = Base relative address of the Delete Key Table 
or not zero. 
Cir.7 = [ff SORT.W1.PID then base relative address 
of 10 character name» else not zero. 


CT<2 = ff SORT.W2.PID then base relative address 
| of 10 character name» else not zero. 


SE Ee ee ae RN eR Ee emia 


REINSTATE STATUS 


After a normal EQJ of the sorting program, the reinstate message 
pointer of the caller wilt contain the SORTs actuai job number in. 


nate nthe be 
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SORT EOS COMMUNICATE 

CT.YERB = 35 
CT.OaJECT = File number to be ctosed 
CT.ACVERS = CLOSE type 
CT.1i = EQF pointer 
CT.2 2 Pecerd S476 | 
\ 
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SORT INFORMATION TABLE FORMAT 


02 SORT.TYPE 
02 SORT.HOWR 


FILLER 

G2 SORT.PURGE.IN- 
PUT.FILES 
SORT.FILES 

G2 SORT.RECSIZE 
SORT.IN.WHOWR 
SORT.IN.RECSIZE 
SORT.INSLKSIZE 
SORT .IN.CLOSE 
SQRT.IN.VARIABLE 
SORT CUT .HDWR 
SORT .OCUT.RECSIZE 
SORT .QUT .BLKSIZE 
SORT.CUT.VARIABLE 
C2 SORT.OUT.CLOSE 
SORT DELETING 

O02 SORT.STABILIZE 
SORT.PARITY 
SORT.RESTART 
SORT.~S1AS 


SORT .RECOURDS 
SORT.FIMING 


SORT .NUMGER.KEYS 
C2 FILLER 
SORT..KEY LENGTH 


FILLER 
02 SORT.PARTITION 
SORT NUMBER DELETE .KEYS 
C2 SORT.DUPCHECK 
—SORT.TAGRPG 
02 SORT.K1.PID 
SORT.W2.PID 
SORT .TAGCOBOL 
FILLER 
 SORT.TAGSEARCH 
C2 SORT.COLLATE 
FILLER | 
‘SORT.RESTART.JOB 


Bit 
BIT 


BIT 
BIT 


BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
a1T 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 


gift 
BiT 


B1iT 
o1T 
ait 


BIT 
BIT 
BIT 
o1T 


BIT 


BIT 
BiT 


BIT 


BIT 
BIT 
BIT 
BIT 
BIT 
BIT 


*ZWORKFILE We 
#4 BYTE TAGS 


~20C VECTOR» O1 = INPLACE, 
%10 TAG» 11 = MERGE 
AMAY BE DISK» OR TAPE 
ZACCODED AS FPB.ZHDWR FOR MCP) 


Hit 


ii. = 
FILE WITH PURGE 

*NUMBER OF EU'S OR TAPES 
%YLARGEST KEY DISPLACEMENT 
ZHARODWARE TYPE 

“MAXIMUM RECORD SIZE IN BITS 
“MAXIMUM BLOCK SIZE IN BITS 
ZCLOSE TYPE 

%41 = VARIABLE RECORDS 
HARDWARE TYPE 

ZMAXIMUM RECORD SIZE IN 8ITS 
“MAXIMUM BLOCK SIZE IN BITS 
%1 = VARIABLE RECORDS 
ZCLOSE TYPE | 

%ZINCLUDE OR DELETE RECORDS 
40 = NOT STASLE © 

Z0 = DSs 1 = 
%1=RE START 
“RANGE 0-99 | | 
4DEFAULT = 59 CRANDOM) 

%# OF RECORDS IN INPUT FILE 
ZDEFAULT = 20,000 

*0 = NO REPORT WANTED 

%1 = PRINT SORT SPECS 
4ZNUMBER OF SORT KEYS 

% 

ZTOTAL LENGTH OF KEYS) 

YIN BITS 

~0 

YPARTITION STARTING RECORD 
40-10 DELETE KEYS | 

x 

%3 BYTE TAGS 
¥WORKFILE Wi 


| 


IGNORE RECORD 


PACK ID 
PACK ID 


%0 

ZMEMORY SIZE 
%TAGSEARCH 
ZCOLLATE 
“RESERVEC FOR DEBUG 
%JO08 NUMBER OF SORT 
%BEING RESTARTED 


iN BITS 


farina nae PATNA ARAN EAU MI NUL SOR RIE HAN CRUE, MOHSEN pes een ay UW, eee 


CLOSE CORRESPONDING INPUT 
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—- a a, wen a wee ee 


The SORT Key Table may contain a maximum of thirty €30) S6-bit 
Key descriptions. Each description will specify ascending or 
descending order,» key Length» and key displacement. Additicnat 
description must be supplied for signed keys which specifies the 
type» tengths» and displacement cof the sign. 


FORMAT: 
Ci SORT.KEY.TABLE 


BSITC1116),5 “Z£MAXK 30 KEYS#ZERO KEYCONE)D 


a KEYCS) 


KEY.FLAGS BIT(C4)> 
03 SIGN.FLAG BIT{O1)> 20 = UNSIGNED 
C3 DIRECTION BIT(G1)> 40 = ASCENDING 
| | %1 = DESCENDING 
03 FILLER BITCO1)> %=0 
O27 TRAN.KEY BITC(01), ZCOLLATE GPTION CUNSIGNED 
%ALPHA KEYS ONLY) 
C2 KEY.LENGTH BIT(12)> %ZLENGTH OF KEY IN BITS 
02 KEY.OISPLACEMENT B17(20)> ZLOCATION FROM BEGINNING 
%OF RECORD 
“ZSIGNED KEYS 

C2 KEY.FLAGS BITCC4), 
03 SIGN.FLAG BIT(O01)> %1 = SIGNED 
03 FILLER BITCO1)> = 0 
O03 NEW.FORMAT BITCO1)>» %= 1 
03 FILLER BITCO1)>» %= 0 

02 LENGTH.AND.SIGN BITC12)> = 40D 
03 LENGTH BIT(O4)> “SIGN LENGTH 
03 SIGN BITC08)>, %SIGN 

02 SIGN DISPLACEMENT 31T(20)> %LOCATION OF SIGN FROM 


4BEGINNING OF RECORD 
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MERGE/MULTIPLE INPUT FILE TABLE 
C1 MUL_INPUT_TA@LE BIT(80)> 
02 “FILLER BITCO8), % = 0 
G2 MERGE.DISK.IN BIT(08), % NUMBER OF INPUT DISK FILES 
C2 WRGE.INPT.FILEC3) BIT(08), % 2-8 INPUT FILE NUMBERS 
DELETE KEY TABLE 
Q1 DELETE.KEYS (10) BIT(43) 
02 KEY.TYPE | BIT(1) % @ = INC 1 = DEL 
C2 LOGIC.TYPE BIT(1) % OG = OR 1 = AND 
02 CATA.TYPE BIT(1) % 0 = DATA 1 = FIELD DESC. 
02 LENGTH.TYPE BITC1) % 0 = DIGIT 1 = BYTE 
02 COMPARE.TYPE BIT(4) 
% GTR = 1 LSS = 2 NEQ = 3 
EQL = 4 GEQ = 5 LEQ = 6 
02 KEY.LENGTH ) BIT(2) 
C2 KEY.OISPL.1 B1T(14) % ITEM 1 
02  KEY.CATA BIT(24) % ITEM 2 
03 FILLER BITC10) 


~~ 03) KREY.DISPL.2 BiT(14) 
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SURT EXECUTION 


SORT can be executed from cards» from the SPO Cconsole keyboard)» 
or from a remote terminal. If SWO=1i, SORT specifications are 
accepted from the SPO Cor remote) instead of the CARDS file. If 
Program Switch One is set (5W1=1)» errors and their source’ text 
are written to a printer or a backup print file named ERROR.~LINE. 
This option is useful to dataccam users who wish to see any 
errors disolayed on their terminals. The job number of the 
actual sorting program is returned to the calling program in its 
RS.~REINSTATE.MSG.PTR. It is a 24-bit binary value. 


SAMPLE EXECUTIONS 


For a single SORT,» the following execute deck would be used? 


CARD CCLUYN #1 | COLUMN #2-80 
#1 2 EXCECUTE) SORT 
#2 2 | DACTA) CARDS 
| | <STATEMENT CARDS> 
LAST ? | END 


For a SURT that can be used over and overs a compite deck woutd 
te used: | 


CARD | CCLUNN #1 COLUMN #2-80 


al es COCMPILE) <GIVEN NAME> 
| 3 CWiTH) SORT LICBRARY) 


Tee 
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To run a SORT from the SPO» use? 

EXCECUTE) SORT SW 0 = 13 

COCMPILE) earth NANE> CWITH) SORT LICBRARY) SW 0 = 13 
The SPO witl respond with: 

<BOJ MESSAGE> 

SORT = <JOB NUMBER> ACCEPT 


Enter specifications by: 


<JOB NUMEER> AX <SCRT STATEMENTS> 


<JC8 NUMBER> AX <BLANK> 
The blank Line terminates the input phase. 
To run a SORT trom a remote terminal and send errors tc printer 
backup» use: 7 
EXCECUTE) SORT SWNO=1 $W1243 
or 


COCMPILE) <GIVEN NAME> CWITH) SORT LICSRARY) SWO=1 SWil=1> 


BURROUGHS CORPORATION 
COMPUTER SYSTEMS GROUP 
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"INVALID 


"INVALID 


"ENVALID 
"INVALID 
"INVALID 
"INVALIC 
"INVALID 
“INVALIC 
"INVALIO 
"INVALID 
"INVALID 
"INVALID 
"INVALID 
"INVALID 
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ERROR MESSAGES 


error messages are orovided by SORT: 


OR 


MISSING 
MISSING 
MISSING 
MISSINE 


MISSING 


MISSING 


MISSING 


MISSING 
MISSING 
MISSING 
MISSING 
MISSING 
MISSING 
MISSING 


RECORCS PER AREA" 
DEVICE TYPE" 

RECORD SIZE" 

NAME IN PARENTHESES" 
FILE STATEMENT" 
VARIABLE BLOCK SIZE" 
FILE NAME™ 

KEY LOCATION" 

KEY LENGTH" 

KEY STATEMENT™ 
RIGHT PARENTHESIS" 
LITERAL" 

COLLATE STATEMENT" 
DELIMITER" 


"NUMBER IS OUT OF RANGE" 


"RECORDS OGPTICN 


"PARITY IS (EVEN) CR CODD)" 

"7JIP IS (255 CHARACTERS IN DELIMITERS)" 
"PARAMS ARE CSTARTING.RECORD HOW.MANY)* 
"QTAS IS C-99" 

"MEMCRY RANGE IS 8000 TQ 
"NO OLS DEFAULT GUT FOR 
"DEFAULT ONLY WITH DISK" 
"TE NGTH 1 SIGNED NUMERIC 


125000 BYTES" 
MERGE" 


KEY REQUIRES UNSIGNED KEY AFTER" 


"TCO MANY FILE IN CR QUT PARTS” 
"CANNOT CLOSE QUTPUT DISK RELEASE™ 
"TOO MANY KEYS SPECIFIED" 

"SORT KEY CUT OF RECORD” 

"PURGE INPUT ONLY” 

"6 BYTES MIN RECORD FOR TAPE™ 
"MULTI ON DISK ONLY” | | 
"RECCRDOS PER AREA NOT EVEN MULTIPLE OF SLUCKS PER AREA™ 
"DISK FILE MUST BE LABELECO"™ 

"TAPESORT NOT PRECEEDED BY NUMBER™ 

NOT PRECEEDED BY NUMBER" 

"MAX MEMORY FOR INPLACE SORT TS 182500" 


"VARIABLE LENGTH RECORDS NCT ALLOWED" 
 "TAGSEARCH MUST HAVE DISK INPUT" 

— “TAGSORT MUST HAVE OUTPUT RECORD SIZE = 
-"INPLACE SCRT CANNCT HANDLE TAGSORT™ 
"VARIABLE GUT MUST HAVE VARIABLE IN" 
"NO INPLACE TRANSLATE" 

"TAPESORT NOT AN INPLACE SCRT® 


4 BYTES" 


BURROUGHS CORPORATION COMPANY CONFIDENTIAL © 
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43. “INVALID INCLUDE DELETE KEY" 

44, "RECQROS PER BLOCK CANNOT 8E 0” 

45. “DELETE KEY OUT OF RECORD" 

46. "DEFAULT MUST BE DISK INPUT" 

47. “CANNOT COMPILE THESE OPTICNS* 

48. "DUPCHECK IN/OUT LIST/COPYCNI/OUMPCN)/REMOVE ALL/FIRST/LAST™ 
49. "INVALIC USt OF LEFT PARENTHESIS" 

50. "TAGSORT OUTPUT CANNOT BE CARD+ PRINT» OR TAPE™ 

Si. “SPECIFIED MORE THAN ONCE™ 

52. "INPLACE SCRT CANNCT DELETE RECORDS OR PARTITION" 

53. “INVALID TAGSORT OPTION COMBINATION" 

S54. "TAGRPG OUTPUT RECCRO SIZE = 3 BYTES + KEYS" 

55. “PARAMS ARE DV ORPT MRPT &LBUMP FLAG" 

S6. “CANNOT DO THESE OUTPUT OPTIONS" % 55 

57. “TAGCOBOL CUTPUT RECORD SIZE = 4 BYTES + KEYS" 

(58. “MISSING LEFT PARENTHESIS" 

59. “INPLACE SORT NOT STABLE™ 

60. “"INPLACE SORT CANNOT PARTITION” 

61. “OPTIONAL FILE ANO DEFAULT NOT ALLOWED" 
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